home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: HyperCard Stack
(archive/hypercard).
You can browse this item here: °Spiro!
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| dexvert
| HyperCard Stack (archive/hypercard)
| magic
| Supported |
100%
| file
| data
| default
| |
100%
| TrID
| HyperCard Stack
| default
|
|
id metadata |
---|
key | value |
---|
macFileType | [STAK] |
macFileCreator | [WILD] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 08 00 53 54 41 4b | ff ff ff ff e6 c1 03 67 |....STAK|.......g|
|00000010| 00 00 00 08 00 00 2a 80 | 00 00 08 00 00 00 00 00 |......*.|........|
|00000020| 00 00 00 00 00 00 00 01 | 00 00 0a d9 00 00 00 01 |........|........|
|00000030| 00 00 0b 2a 00 00 09 fc | 00 00 00 00 00 00 00 00 |...*....|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 05 00 00 10 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 01 22 80 00 01 22 80 00 | 01 22 80 00 01 22 80 00 |."..."..|."..."..|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|000002d0| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|000002e0| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|000002f0| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000300| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000310| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|00000320| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|00000330| c4 80 0c 68 43 02 30 26 | b1 30 03 1b d8 c0 0c 8d |...hC.0&|.0......|
|00000340| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|00000350| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|00000360| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|00000370| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000380| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000390| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|000003a0| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|000003b0| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|000003c0| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|000003d0| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|000003e0| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|000003f0| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 53 50 49 52 4f |--------|---SPIRO|
|00000610| 21 a9 20 31 39 38 39 20 | 41 6e 64 72 65 77 20 43 |!. 1989 |Andrew C|
|00000620| 2e 20 53 74 6f 6e 65 0d | 2d 2d 2d 2d 2d 2d 2d 2d |. Stone.|--------|
|00000630| 2d 2d 2d 54 68 69 73 20 | 69 73 20 66 72 65 65 77 |---This |is freew|
|00000640| 61 72 65 3a 20 67 69 76 | 65 20 69 74 20 61 77 61 |are: giv|e it awa|
|00000650| 79 2c 20 62 75 74 20 64 | 6f 20 6e 6f 74 20 72 65 |y, but d|o not re|
|00000660| 73 65 6c 6c 20 6f 72 20 | 72 65 75 73 65 0d 2d 2d |sell or |reuse.--|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 61 6e 64 20 72 65 73 |--------|-and res|
|00000680| 65 6c 6c 20 61 6e 79 20 | 70 61 72 74 20 6f 66 20 |ell any |part of |
|00000690| 74 68 69 73 2e 0d 6f 6e | 20 6f 70 65 6e 73 74 61 |this..on| opensta|
|000006a0| 63 6b 0d 67 65 74 20 74 | 68 65 20 6c 6f 63 20 6f |ck.get t|he loc o|
|000006b0| 66 20 63 61 72 64 20 77 | 69 6e 64 6f 77 0d 69 66 |f card w|indow.if|
|000006c0| 20 69 74 20 69 73 20 22 | 30 2c 30 22 20 74 68 65 | it is "|0,0" the|
|000006d0| 6e 0d 68 69 64 65 20 6d | 65 6e 75 62 61 72 0d 68 |n.hide m|enubar.h|
|000006e0| 69 64 65 20 6d 73 67 0d | 65 6e 64 20 69 66 0d 65 |ide msg.|end if.e|
|000006f0| 6e 64 20 6f 70 65 6e 73 | 74 61 63 6b 0d 0d 6f 6e |nd opens|tack..on|
|00000700| 20 63 6c 6f 73 65 73 74 | 61 63 6b 0d 73 68 6f 77 | closest|ack.show|
|00000710| 20 6d 65 6e 75 62 61 72 | 0d 65 6e 64 20 63 6c 6f | menubar|.end clo|
|00000720| 73 65 73 74 61 63 6b 0d | 00 00 00 00 00 00 00 00 |sestack.|........|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000800| 00 00 02 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00000810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000820| 00 01 48 9f 00 00 50 fc | 00 00 94 d9 00 01 4b 2a |..H...P.|......K*|
|00000830| 00 00 00 00 00 00 54 27 | 00 00 00 00 00 00 00 00 |......T'|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000900| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a00| 00 00 00 80 4c 49 53 54 | 00 00 09 fc 00 00 00 01 |....LIST|........|
|00000a10| 00 00 08 00 00 00 00 01 | 00 08 00 02 00 01 00 03 |........|........|
|00000a20| e0 00 01 a5 00 00 00 01 | 00 00 00 00 00 00 00 00 |........|........|
|00000a30| 00 00 0d 27 00 01 00 00 | 00 00 00 00 00 00 00 00 |...'....|........|
|00000a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a80| 00 00 08 00 50 41 47 45 | 00 00 0d 27 00 00 09 fc |....PAGE|...'....|
|00000a90| 40 00 01 65 00 00 00 00 | 00 00 0b 2a 60 00 00 62 |@..e....|...*`..b|
|00000aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ea0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001000| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001280| 00 00 16 80 42 4b 47 44 | 00 00 0a d9 00 00 08 9f |....BKGD|........|
|00001290| 00 00 00 00 00 00 00 01 | 00 00 0a d9 00 00 0a d9 |........|........|
|000012a0| 00 0c 00 0d 00 00 0d 6c | 00 00 00 00 00 00 00 28 |.......l|.......(|
|000012b0| 00 02 02 00 00 2f 01 b2 | 00 43 02 00 00 02 00 00 |...../..|.C......|
|000012c0| 00 00 00 01 00 03 00 0e | 01 00 00 12 6d 79 61 6e |........|....myan|
|000012d0| 67 6c 65 00 00 00 03 9c | 00 03 01 00 00 1d 01 b2 |gle.....|........|
|000012e0| 00 31 02 00 c0 02 00 00 | 00 00 00 01 00 03 00 0c |.1......|........|
|000012f0| 01 00 00 10 41 6e 67 6c | 65 00 00 6f 6e 20 6d 6f |....Angl|e..on mo|
|00001300| 75 73 65 64 6f 77 6e 0d | 70 75 74 20 50 6f 70 55 |usedown.|put PopU|
|00001310| 70 4d 65 6e 75 28 22 39 | 30 3b 39 31 3b 31 30 33 |pMenu("9|0;91;103|
|00001320| 3b 31 30 39 3b 31 32 31 | 3b 31 32 39 3b 31 33 36 |;109;121|;129;136|
|00001330| 3b 31 34 35 3b 31 35 32 | 3b 31 35 39 3b 31 36 33 |;145;152|;159;163|
|00001340| 3b 31 37 30 2c 4f 74 68 | 65 72 c9 22 2c c2 0d 30 |;170,Oth|er.",..0|
|00001350| 2c 20 74 68 65 20 6d 6f | 75 73 65 56 20 2c 20 74 |, the mo|useV , t|
|00001360| 68 65 20 6d 6f 75 73 65 | 48 20 2d 20 32 30 29 20 |he mouse|H - 20) |
|00001370| 69 6e 74 6f 20 77 68 69 | 63 68 0d 69 66 20 77 68 |into whi|ch.if wh|
|00001380| 69 63 68 20 69 73 20 30 | 20 74 68 65 6e 20 65 78 |ich is 0| then ex|
|00001390| 69 74 20 6d 6f 75 73 65 | 64 6f 77 6e 0d 0d 69 66 |it mouse|down..if|
|000013a0| 20 77 68 69 63 68 20 20 | 69 73 20 31 20 74 68 65 | which |is 1 the|
|000013b0| 6e 0d 70 75 74 20 22 39 | 30 22 20 69 6e 74 6f 20 |n.put "9|0" into |
|000013c0| 66 6c 64 20 6d 79 61 6e | 67 6c 65 0d 65 6c 73 65 |fld myan|gle.else|
|000013d0| 20 69 66 20 77 68 69 63 | 68 20 69 73 20 32 20 74 | if whic|h is 2 t|
|000013e0| 68 65 6e 0d 70 75 74 20 | 22 39 31 22 20 69 6e 74 |hen.put |"91" int|
|000013f0| 6f 20 66 6c 64 20 6d 79 | 61 6e 67 6c 65 0d 65 6c |o fld my|angle.el|
|00001400| 73 65 20 69 66 20 77 68 | 69 63 68 20 69 73 20 33 |se if wh|ich is 3|
|00001410| 20 74 68 65 6e 0d 70 75 | 74 20 22 31 30 33 22 20 | then.pu|t "103" |
|00001420| 69 6e 74 6f 20 66 6c 64 | 20 6d 79 61 6e 67 6c 65 |into fld| myangle|
|00001430| 0d 65 6c 73 65 20 69 66 | 20 77 68 69 63 68 20 69 |.else if| which i|
|00001440| 73 20 34 20 74 68 65 6e | 0d 70 75 74 20 22 31 30 |s 4 then|.put "10|
|00001450| 39 22 20 69 6e 74 6f 20 | 66 6c 64 20 6d 79 61 6e |9" into |fld myan|
|00001460| 67 6c 65 0d 65 6c 73 65 | 20 69 66 20 77 68 69 63 |gle.else| if whic|
|00001470| 68 20 69 73 20 35 20 74 | 68 65 6e 0d 70 75 74 20 |h is 5 t|hen.put |
|00001480| 22 31 32 31 22 20 69 6e | 74 6f 20 66 6c 64 20 6d |"121" in|to fld m|
|00001490| 79 61 6e 67 6c 65 0d 65 | 6c 73 65 20 69 66 20 77 |yangle.e|lse if w|
|000014a0| 68 69 63 68 20 69 73 20 | 36 20 74 68 65 6e 0d 70 |hich is |6 then.p|
|000014b0| 75 74 20 22 31 32 39 22 | 20 69 6e 74 6f 20 66 6c |ut "129"| into fl|
|000014c0| 64 20 6d 79 61 6e 67 6c | 65 0d 65 6c 73 65 20 69 |d myangl|e.else i|
|000014d0| 66 20 77 68 69 63 68 20 | 69 73 20 37 20 74 68 65 |f which |is 7 the|
|000014e0| 6e 0d 70 75 74 20 22 31 | 33 36 22 20 69 6e 74 6f |n.put "1|36" into|
|000014f0| 20 66 6c 64 20 6d 79 61 | 6e 67 6c 65 0d 65 6c 73 | fld mya|ngle.els|
|00001500| 65 20 69 66 20 77 68 69 | 63 68 20 69 73 20 38 20 |e if whi|ch is 8 |
|00001510| 74 68 65 6e 0d 70 75 74 | 20 22 31 34 35 22 20 69 |then.put| "145" i|
|00001520| 6e 74 6f 20 66 6c 64 20 | 6d 79 61 6e 67 6c 65 0d |nto fld |myangle.|
|00001530| 65 6c 73 65 20 69 66 20 | 77 68 69 63 68 20 69 73 |else if |which is|
|00001540| 20 39 20 74 68 65 6e 0d | 70 75 74 20 22 31 35 32 | 9 then.|put "152|
|00001550| 22 20 69 6e 74 6f 20 66 | 6c 64 20 6d 79 61 6e 67 |" into f|ld myang|
|00001560| 6c 65 0d 65 6c 73 65 20 | 69 66 20 77 68 69 63 68 |le.else |if which|
|00001570| 20 69 73 20 31 30 20 74 | 68 65 6e 0d 70 75 74 20 | is 10 t|hen.put |
|00001580| 22 31 35 39 22 20 69 6e | 74 6f 20 66 6c 64 20 6d |"159" in|to fld m|
|00001590| 79 61 6e 67 6c 65 0d 65 | 6c 73 65 20 69 66 20 77 |yangle.e|lse if w|
|000015a0| 68 69 63 68 20 69 73 20 | 31 31 20 74 68 65 6e 0d |hich is |11 then.|
|000015b0| 70 75 74 20 22 31 36 33 | 22 20 69 6e 74 6f 20 66 |put "163|" into f|
|000015c0| 6c 64 20 6d 79 61 6e 67 | 6c 65 0d 65 6c 73 65 20 |ld myang|le.else |
|000015d0| 69 66 20 77 68 69 63 68 | 20 69 73 20 31 32 20 74 |if which| is 12 t|
|000015e0| 68 65 6e 0d 70 75 74 20 | 22 31 37 30 22 20 69 6e |hen.put |"170" in|
|000015f0| 74 6f 20 66 6c 64 20 6d | 79 61 6e 67 6c 65 0d 65 |to fld m|yangle.e|
|00001600| 6c 73 65 20 69 66 20 77 | 68 69 63 68 20 69 73 20 |lse if w|hich is |
|00001610| 31 33 20 74 68 65 6e 0d | 61 73 6b 20 22 50 6c 65 |13 then.|ask "Ple|
|00001620| 61 73 65 20 65 6e 74 65 | 72 20 61 6e 67 6c 65 20 |ase ente|r angle |
|00001630| 62 65 74 77 65 65 6e 20 | 39 30 20 26 20 31 38 30 |between |90 & 180|
|00001640| 3a 22 0d 70 75 74 20 69 | 74 20 69 6e 74 6f 20 66 |:".put i|t into f|
|00001650| 6c 64 20 6d 79 61 6e 67 | 6c 65 0d 65 6e 64 20 69 |ld myang|le.end i|
|00001660| 66 0d 65 6e 64 20 6d 6f | 75 73 65 64 6f 77 6e 0d |f.end mo|usedown.|
|00001670| 00 00 01 40 00 04 01 00 | 00 50 01 b2 00 64 02 00 |...@....|.P...d..|
|00001680| c0 02 00 00 00 00 00 01 | 00 03 00 0c 01 00 00 10 |........|........|
|00001690| 49 6e 63 72 65 6d 65 6e | 74 00 00 6f 6e 20 6d 6f |Incremen|t..on mo|
|000016a0| 75 73 65 64 6f 77 6e 0d | 70 75 74 20 50 6f 70 55 |usedown.|put PopU|
|000016b0| 70 4d 65 6e 75 28 22 31 | 3b 32 3b 33 3b 34 3b 35 |pMenu("1|;2;3;4;5|
|000016c0| 3b 36 3b 37 3b 38 3b 39 | 3b 31 30 3b 31 31 3b 31 |;6;7;8;9|;10;11;1|
|000016d0| 32 2c 4f 74 68 65 72 c9 | 22 2c c2 0d 30 2c 20 74 |2,Other.|",..0, t|
|000016e0| 68 65 20 6d 6f 75 73 65 | 56 20 2c 20 74 68 65 20 |he mouse|V , the |
|000016f0| 6d 6f 75 73 65 48 20 2d | 20 32 30 29 20 69 6e 74 |mouseH -| 20) int|
|00001700| 6f 20 77 68 69 63 68 0d | 69 66 20 77 68 69 63 68 |o which.|if which|
|00001710| 20 69 73 20 30 20 74 68 | 65 6e 20 65 78 69 74 20 | is 0 th|en exit |
|00001720| 6d 6f 75 73 65 64 6f 77 | 6e 0d 69 66 20 77 68 69 |mousedow|n.if whi|
|00001730| 63 68 20 69 73 20 31 33 | 20 74 68 65 6e 0d 61 73 |ch is 13| then.as|
|00001740| 6b 20 22 50 6c 65 61 73 | 65 20 65 6e 74 65 72 20 |k "Pleas|e enter |
|00001750| 69 6e 63 72 65 6d 65 6e | 74 3a 22 0d 70 75 74 20 |incremen|t:".put |
|00001760| 69 74 20 69 6e 74 6f 20 | 66 6c 64 20 6d 79 69 6e |it into |fld myin|
|00001770| 63 72 65 6d 65 6e 74 0d | 65 6c 73 65 0d 70 75 74 |crement.|else.put|
|00001780| 20 77 68 69 63 68 20 69 | 6e 74 6f 20 66 6c 64 20 | which i|nto fld |
|00001790| 6d 79 69 6e 63 72 65 6d | 65 6e 74 0d 65 6e 64 20 |myincrem|ent.end |
|000017a0| 69 66 0d 65 6e 64 20 6d | 6f 75 73 65 64 6f 77 6e |if.end m|ousedown|
|000017b0| 0d 00 01 36 00 05 01 00 | 00 83 01 b2 00 96 02 00 |...6....|........|
|000017c0| c0 02 00 00 00 00 00 01 | 00 03 00 0c 01 00 00 10 |........|........|
|000017d0| 4c 69 6e 65 20 57 69 64 | 74 68 00 00 6f 6e 20 6d |Line Wid|th..on m|
|000017e0| 6f 75 73 65 64 6f 77 6e | 0d 70 75 74 20 50 6f 70 |ousedown|.put Pop|
|000017f0| 55 70 4d 65 6e 75 28 22 | 31 3b 32 3b 33 3b 34 3b |UpMenu("|1;2;3;4;|
|00001800| 35 3b 36 3b 37 3b 38 3b | 4f 74 68 65 72 c9 22 2c |5;6;7;8;|Other.",|
|00001810| c2 0d 30 2c 20 74 68 65 | 20 6d 6f 75 73 65 56 20 |..0, the| mouseV |
|00001820| 2c 20 74 68 65 20 6d 6f | 75 73 65 48 20 2d 20 32 |, the mo|useH - 2|
|00001830| 30 29 20 69 6e 74 6f 20 | 77 68 69 63 68 0d 69 66 |0) into |which.if|
|00001840| 20 77 68 69 63 68 20 69 | 73 20 30 20 74 68 65 6e | which i|s 0 then|
|00001850| 20 65 78 69 74 20 6d 6f | 75 73 65 64 6f 77 6e 0d | exit mo|usedown.|
|00001860| 69 66 20 77 68 69 63 68 | 20 69 73 20 39 20 74 68 |if which| is 9 th|
|00001870| 65 6e 0d 61 73 6b 20 22 | 50 6c 65 61 73 65 20 65 |en.ask "|Please e|
|00001880| 6e 74 65 72 20 6c 69 6e | 65 20 77 69 64 74 68 20 |nter lin|e width |
|00001890| 5b 31 20 74 6f 20 38 5d | 3a 22 0d 70 75 74 20 69 |[1 to 8]|:".put i|
|000018a0| 74 20 69 6e 74 6f 20 66 | 6c 64 20 6d 79 57 69 64 |t into f|ld myWid|
|000018b0| 74 68 0d 65 6c 73 65 0d | 70 75 74 20 77 68 69 63 |th.else.|put whic|
|000018c0| 68 20 69 6e 74 6f 20 66 | 6c 64 20 6d 79 57 69 64 |h into f|ld myWid|
|000018d0| 74 68 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 6d 6f |th.end i|f.end mo|
|000018e0| 75 73 65 64 6f 77 6e 00 | 02 f0 00 06 01 00 00 e7 |usedown.|........|
|000018f0| 01 b2 00 fb 02 00 c0 02 | 00 00 00 00 00 01 00 03 |........|........|
|00001900| 00 0c 01 00 00 10 4c 61 | 73 74 20 4c 69 6e 65 00 |......La|st Line.|
|00001910| 00 6f 6e 20 6d 6f 75 73 | 65 64 6f 77 6e 0d 70 75 |.on mous|edown.pu|
|00001920| 74 20 50 6f 70 55 70 4d | 65 6e 75 28 22 31 35 30 |t PopUpM|enu("150|
|00001930| 3b 32 30 30 3b 32 35 30 | 3b 33 30 30 3b 33 35 30 |;200;250|;300;350|
|00001940| 3b 34 30 30 3b 34 35 30 | 3b 35 35 30 3b 36 35 30 |;400;450|;550;650|
|00001950| 3b 4f 74 68 65 72 c9 22 | 2c c2 0d 30 2c 20 74 68 |;Other."|,..0, th|
|00001960| 65 20 6d 6f 75 73 65 56 | 20 2c 20 74 68 65 20 6d |e mouseV| , the m|
|00001970| 6f 75 73 65 48 20 2d 20 | 32 30 29 20 69 6e 74 6f |ouseH - |20) into|
|00001980| 20 77 68 69 63 68 0d 69 | 66 20 77 68 69 63 68 20 | which.i|f which |
|00001990| 69 73 20 30 20 74 68 65 | 6e 20 65 78 69 74 20 6d |is 0 the|n exit m|
|000019a0| 6f 75 73 65 64 6f 77 6e | 0d 69 66 20 77 68 69 63 |ousedown|.if whic|
|000019b0| 68 20 20 69 73 20 31 20 | 74 68 65 6e 0d 70 75 74 |h is 1 |then.put|
|000019c0| 20 22 31 35 30 22 20 69 | 6e 74 6f 20 66 6c 64 20 | "150" i|nto fld |
|000019d0| 6d 79 65 6e 64 4c 0d 65 | 6c 73 65 20 69 66 20 77 |myendL.e|lse if w|
|000019e0| 68 69 63 68 20 69 73 20 | 32 20 74 68 65 6e 0d 70 |hich is |2 then.p|
|000019f0| 75 74 20 22 32 30 30 22 | 20 69 6e 74 6f 20 66 6c |ut "200"| into fl|
|00001a00| 64 20 6d 79 65 6e 64 4c | 0d 65 6c 73 65 20 69 66 |d myendL|.else if|
|00001a10| 20 77 68 69 63 68 20 69 | 73 20 33 20 74 68 65 6e | which i|s 3 then|
|00001a20| 0d 70 75 74 20 22 32 35 | 30 22 20 69 6e 74 6f 20 |.put "25|0" into |
|00001a30| 66 6c 64 20 6d 79 65 6e | 64 4c 0d 65 6c 73 65 20 |fld myen|dL.else |
|00001a40| 69 66 20 77 68 69 63 68 | 20 69 73 20 34 20 74 68 |if which| is 4 th|
|00001a50| 65 6e 0d 70 75 74 20 22 | 33 30 30 22 20 69 6e 74 |en.put "|300" int|
|00001a60| 6f 20 66 6c 64 20 6d 79 | 65 6e 64 4c 0d 65 6c 73 |o fld my|endL.els|
|00001a70| 65 20 69 66 20 77 68 69 | 63 68 20 69 73 20 35 20 |e if whi|ch is 5 |
|00001a80| 74 68 65 6e 0d 70 75 74 | 20 22 33 35 30 22 20 69 |then.put| "350" i|
|00001a90| 6e 74 6f 20 66 6c 64 20 | 6d 79 65 6e 64 4c 0d 65 |nto fld |myendL.e|
|00001aa0| 6c 73 65 20 69 66 20 77 | 68 69 63 68 20 69 73 20 |lse if w|hich is |
|00001ab0| 36 20 74 68 65 6e 0d 70 | 75 74 20 22 34 30 30 22 |6 then.p|ut "400"|
|00001ac0| 20 69 6e 74 6f 20 66 6c | 64 20 6d 79 65 6e 64 4c | into fl|d myendL|
|00001ad0| 0d 65 6c 73 65 20 69 66 | 20 77 68 69 63 68 20 69 |.else if| which i|
|00001ae0| 73 20 37 20 74 68 65 6e | 0d 70 75 74 20 22 34 35 |s 7 then|.put "45|
|00001af0| 30 22 20 69 6e 74 6f 20 | 66 6c 64 20 6d 79 65 6e |0" into |fld myen|
|00001b00| 64 4c 0d 65 6c 73 65 20 | 69 66 20 77 68 69 63 68 |dL.else |if which|
|00001b10| 20 69 73 20 38 20 74 68 | 65 6e 0d 70 75 74 20 22 | is 8 th|en.put "|
|00001b20| 35 35 30 22 20 69 6e 74 | 6f 20 66 6c 64 20 6d 79 |550" int|o fld my|
|00001b30| 65 6e 64 4c 0d 65 6c 73 | 65 20 69 66 20 77 68 69 |endL.els|e if whi|
|00001b40| 63 68 20 69 73 20 39 20 | 74 68 65 6e 0d 70 75 74 |ch is 9 |then.put|
|00001b50| 20 22 36 35 30 22 20 69 | 6e 74 6f 20 66 6c 64 20 | "650" i|nto fld |
|00001b60| 6d 79 65 6e 64 4c 0d 65 | 6c 73 65 20 69 66 20 77 |myendL.e|lse if w|
|00001b70| 68 69 63 68 20 69 73 20 | 31 30 20 74 68 65 6e 0d |hich is |10 then.|
|00001b80| 61 73 6b 20 22 50 6c 65 | 61 73 65 20 65 6e 74 65 |ask "Ple|ase ente|
|00001b90| 72 20 6c 65 6e 67 74 68 | 20 6f 66 20 6c 6f 6e 67 |r length| of long|
|00001ba0| 65 73 74 20 6c 69 6e 65 | 3a 22 0d 70 75 74 20 69 |est line|:".put i|
|00001bb0| 74 20 69 6e 74 6f 20 66 | 6c 64 20 6d 79 65 6e 64 |t into f|ld myend|
|00001bc0| 4c 0d 65 6e 64 20 69 66 | 0d 65 6e 64 20 6d 6f 75 |L.end if|.end mou|
|00001bd0| 73 65 64 6f 77 6e 0d 00 | 01 b0 00 07 01 00 00 b4 |sedown..|........|
|00001be0| 01 b2 00 c7 02 00 c0 02 | 00 00 00 00 00 01 00 03 |........|........|
|00001bf0| 00 0c 01 00 00 10 46 69 | 72 73 74 20 4c 69 6e 65 |......Fi|rst Line|
|00001c00| 00 00 6f 6e 20 6d 6f 75 | 73 65 64 6f 77 6e 0d 70 |..on mou|sedown.p|
|00001c10| 75 74 20 50 6f 70 55 70 | 4d 65 6e 75 28 22 31 3b |ut PopUp|Menu("1;|
|00001c20| 32 3b 33 3b 34 3b 35 3b | 36 3b 37 3b 38 3b 39 3b |2;3;4;5;|6;7;8;9;|
|00001c30| 31 30 3b 32 30 3b 33 30 | 2c 4f 74 68 65 72 c9 22 |10;20;30|,Other."|
|00001c40| 2c c2 0d 30 2c 20 74 68 | 65 20 6d 6f 75 73 65 56 |,..0, th|e mouseV|
|00001c50| 20 2c 20 74 68 65 20 6d | 6f 75 73 65 48 20 2d 20 | , the m|ouseH - |
|00001c60| 32 30 29 20 69 6e 74 6f | 20 77 68 69 63 68 0d 69 |20) into| which.i|
|00001c70| 66 20 77 68 69 63 68 20 | 69 73 20 30 20 74 68 65 |f which |is 0 the|
|00001c80| 6e 20 65 78 69 74 20 6d | 6f 75 73 65 64 6f 77 6e |n exit m|ousedown|
|00001c90| 0d 69 66 20 77 68 69 63 | 68 20 20 69 73 20 31 31 |.if whic|h is 11|
|00001ca0| 20 74 68 65 6e 0d 70 75 | 74 20 22 32 30 22 20 69 | then.pu|t "20" i|
|00001cb0| 6e 74 6f 20 66 6c 64 20 | 6d 79 73 74 61 72 74 4c |nto fld |mystartL|
|00001cc0| 0d 65 6c 73 65 20 69 66 | 20 77 68 69 63 68 20 69 |.else if| which i|
|00001cd0| 73 20 31 32 20 74 68 65 | 6e 0d 70 75 74 20 22 33 |s 12 the|n.put "3|
|00001ce0| 30 22 20 69 6e 74 6f 20 | 66 6c 64 20 6d 79 73 74 |0" into |fld myst|
|00001cf0| 61 72 74 4c 0d 65 6c 73 | 65 20 69 66 20 77 68 69 |artL.els|e if whi|
|00001d00| 63 68 20 69 73 20 31 33 | 20 74 68 65 6e 0d 61 73 |ch is 13| then.as|
|00001d10| 6b 20 22 45 6e 74 65 72 | 20 70 69 78 65 6c 20 6c |k "Enter| pixel l|
|00001d20| 65 6e 67 74 68 20 6f 66 | 20 66 69 72 73 74 20 6c |ength of| first l|
|00001d30| 69 6e 65 3a 22 0d 70 75 | 74 20 69 74 20 69 6e 74 |ine:".pu|t it int|
|00001d40| 6f 20 66 6c 64 20 6d 79 | 73 74 61 72 74 4c 0d 65 |o fld my|startL.e|
|00001d50| 6c 73 65 0d 70 75 74 20 | 77 68 69 63 68 20 69 6e |lse.put |which in|
|00001d60| 74 6f 20 66 6c 64 20 6d | 79 73 74 61 72 74 4c 0d |to fld m|ystartL.|
|00001d70| 65 6e 64 20 69 66 0d 65 | 6e 64 20 6d 6f 75 73 65 |end if.e|nd mouse|
|00001d80| 64 6f 77 6e 0d 0d 00 00 | 00 2c 00 08 02 00 00 64 |down....|.,.....d|
|00001d90| 01 b2 00 78 02 00 00 02 | 00 00 00 00 00 01 00 03 |...x....|........|
|00001da0| 00 0e 01 00 00 12 6d 79 | 69 6e 63 72 65 6d 65 6e |......my|incremen|
|00001db0| 74 00 00 00 00 28 00 09 | 02 00 00 96 01 b2 00 aa |t....(..|........|
|00001dc0| 02 00 00 02 00 00 00 00 | 00 01 00 03 00 0e 01 00 |........|........|
|00001dd0| 00 12 6d 79 57 69 64 74 | 68 00 00 00 00 2a 00 0a |..myWidt|h....*..|
|00001de0| 02 00 00 c7 01 b2 00 da | 02 00 00 02 00 00 00 00 |........|........|
|00001df0| 00 01 00 03 00 0e 01 00 | 00 12 6d 79 73 74 61 72 |........|..mystar|
|00001e00| 74 4c 00 00 00 00 00 28 | 00 0b 02 00 00 fb 01 b2 |tL.....(|........|
|00001e10| 01 0e 02 00 00 02 00 00 | 00 00 00 01 00 03 00 0e |........|........|
|00001e20| 01 00 00 12 6d 79 45 6e | 64 4c 00 00 00 00 00 80 |....myEn|dL......|
|00001e30| 00 0c 01 00 01 15 01 b5 | 01 36 01 fd 80 03 00 00 |........|.6......|
|00001e40| 00 00 00 01 00 03 00 12 | 01 00 00 18 53 50 49 52 |........|....SPIR|
|00001e50| 4f 21 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 73 |O!..on m|ouseUp.s|
|00001e60| 65 74 20 74 68 65 20 68 | 69 6c 69 74 65 20 6f 66 |et the h|ilite of|
|00001e70| 20 6d 65 20 74 6f 20 74 | 72 75 65 0d 73 70 69 72 | me to t|rue.spir|
|00001e80| 6f 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |o.set th|e hilite|
|00001e90| 20 6f 66 20 6d 65 20 74 | 6f 20 66 61 6c 73 65 0d | of me t|o false.|
|00001ea0| 65 6e 64 20 6d 6f 75 73 | 65 55 70 0d 00 00 01 6c |end mous|eUp....l|
|00001eb0| 00 0d 01 00 01 3e 01 b5 | 01 52 01 fd 80 03 00 00 |.....>..|.R......|
|00001ec0| 00 00 00 01 00 00 00 0c | 00 00 00 10 43 6c 65 61 |........|....Clea|
|00001ed0| 72 20 41 6c 6c 00 00 6f | 6e 20 6d 6f 75 73 65 55 |r All..o|n mouseU|
|00001ee0| 70 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |p.set th|e hilite|
|00001ef0| 20 6f 66 20 6d 65 20 74 | 6f 20 74 72 75 65 0d 69 | of me t|o true.i|
|00001f00| 66 20 74 68 65 20 63 6f | 6d 6d 61 6e 64 6b 65 79 |f the co|mmandkey|
|00001f10| 20 69 73 20 64 6f 77 6e | 20 74 68 65 6e 0d 63 68 | is down| then.ch|
|00001f20| 6f 6f 73 65 20 73 65 6c | 65 63 74 20 74 6f 6f 6c |oose sel|ect tool|
|00001f30| 0d 64 6f 6d 65 6e 75 20 | 22 73 65 6c 65 63 74 20 |.domenu |"select |
|00001f40| 61 6c 6c 22 0d 64 6f 6d | 65 6e 75 20 22 69 6e 76 |all".dom|enu "inv|
|00001f50| 65 72 74 22 0d 64 72 61 | 67 20 66 72 6f 6d 20 34 |ert".dra|g from 4|
|00001f60| 33 34 2c 31 20 74 6f 20 | 35 31 32 2c 33 34 32 0d |34,1 to |512,342.|
|00001f70| 74 79 70 65 20 6e 75 6d | 74 6f 63 68 61 72 28 38 |type num|tochar(8|
|00001f80| 29 0d 63 68 6f 6f 73 65 | 20 62 72 6f 77 73 65 20 |).choose| browse |
|00001f90| 74 6f 6f 6c 0d 65 6c 73 | 65 0d 0d 63 68 6f 6f 73 |tool.els|e..choos|
|00001fa0| 65 20 73 65 6c 65 63 74 | 20 74 6f 6f 6c 0d 64 6f |e select| tool.do|
|00001fb0| 6d 65 6e 75 20 22 73 65 | 6c 65 63 74 20 61 6c 6c |menu "se|lect all|
|00001fc0| 22 0d 74 79 70 65 20 6e | 75 6d 74 6f 63 68 61 72 |".type n|umtochar|
|00001fd0| 28 38 29 0d 65 6e 64 20 | 69 66 0d 73 65 74 20 74 |(8).end |if.set t|
|00001fe0| 68 65 20 68 69 6c 69 74 | 65 20 6f 66 20 6d 65 20 |he hilit|e of me |
|00001ff0| 74 6f 20 66 61 6c 73 65 | 0d 0d 63 68 6f 6f 73 65 |to false|..choose|
|00002000| 20 62 72 6f 77 73 65 20 | 74 6f 6f 6c 0d 65 6e 64 | browse |tool.end|
|00002010| 20 6d 6f 75 73 65 55 70 | 0d 00 00 2d 2d 2d 2d 2d | mouseUp|...-----|
|00002020| 2d 2d 2d 2d 2d 2d 2d 2d | 53 50 49 52 4f 21 a9 20 |--------|SPIRO!. |
|00002030| 20 20 62 79 20 61 6e 64 | 72 65 77 20 63 20 73 74 | by and|rew c st|
|00002040| 6f 6e 65 20 20 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |one --|--------|
|00002050| 2d 2d 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--.-----|--------|
|00002060| 55 55 43 50 20 20 20 20 | 20 73 74 6f 6e 65 40 68 |UUCP | stone@h|
|00002070| 79 64 72 61 2e 75 6e 6d | 2e 65 64 75 20 20 20 73 |ydra.unm|.edu s|
|00002080| 74 6f 6e 65 40 73 6c 65 | 65 70 79 2e 63 73 2e 75 |tone@sle|epy.cs.u|
|00002090| 6e 6d 2e 65 64 75 0d 0d | 6f 6e 20 73 70 69 72 6f |nm.edu..|on spiro|
|000020a0| 0d 2d 2d 2d 2d 2d 2d 20 | 67 65 74 20 74 68 65 20 |.------ |get the |
|000020b0| 73 70 65 63 69 66 69 63 | 61 74 69 6f 6e 73 3a 0d |specific|ations:.|
|000020c0| 2d 2d 2d 2d 2d 2d 20 68 | 61 76 65 20 64 65 66 61 |------ h|ave defa|
|000020d0| 75 6c 74 73 20 66 6f 72 | 20 6e 6f 2d 62 72 61 69 |ults for| no-brai|
|000020e0| 6e 65 72 73 0d 0d 70 75 | 74 20 28 74 68 65 20 63 |ners..pu|t (the c|
|000020f0| 6f 6d 6d 61 6e 64 6b 65 | 79 20 69 73 20 64 6f 77 |ommandke|y is dow|
|00002100| 6e 29 20 69 6e 74 6f 20 | 75 73 65 53 70 65 63 69 |n) into |useSpeci|
|00002110| 61 6c 0d 0d 0d 70 75 74 | 20 76 61 6c 69 64 61 74 |al...put| validat|
|00002120| 65 28 66 6c 64 20 22 6d | 79 61 6e 67 6c 65 22 29 |e(fld "m|yangle")|
|00002130| 20 69 6e 74 6f 20 61 6e | 67 6c 65 0d 69 66 20 61 | into an|gle.if a|
|00002140| 6e 67 6c 65 20 69 73 20 | 65 6d 70 74 79 20 74 68 |ngle is |empty th|
|00002150| 65 6e 0d 70 75 74 20 31 | 32 31 20 69 6e 74 6f 20 |en.put 1|21 into |
|00002160| 61 6e 67 6c 65 0d 70 75 | 74 20 31 32 31 20 69 6e |angle.pu|t 121 in|
|00002170| 74 6f 20 66 6c 64 20 22 | 6d 79 61 6e 67 6c 65 22 |to fld "|myangle"|
|00002180| 0d 65 6e 64 20 69 66 0d | 0d 70 75 74 20 76 61 6c |.end if.|.put val|
|00002190| 69 64 61 74 65 28 66 6c | 64 20 22 6d 79 77 69 64 |idate(fl|d "mywid|
|000021a0| 74 68 22 29 20 69 6e 74 | 6f 20 6c 77 69 64 74 68 |th") int|o lwidth|
|000021b0| 0d 69 66 20 6c 77 69 64 | 74 68 20 69 73 20 65 6d |.if lwid|th is em|
|000021c0| 70 74 79 20 74 68 65 6e | 0d 70 75 74 20 31 20 69 |pty then|.put 1 i|
|000021d0| 6e 74 6f 20 6c 77 69 64 | 74 68 0d 70 75 74 20 31 |nto lwid|th.put 1|
|000021e0| 20 69 6e 74 6f 20 66 6c | 64 20 22 6d 79 77 69 64 | into fl|d "mywid|
|000021f0| 74 68 22 0d 65 6e 64 20 | 69 66 0d 73 65 74 20 74 |th".end |if.set t|
|00002200| 68 65 20 6c 69 6e 65 73 | 69 7a 65 20 74 6f 20 6c |he lines|ize to l|
|00002210| 77 69 64 74 68 0d 0d 70 | 75 74 20 76 61 6c 69 64 |width..p|ut valid|
|00002220| 61 74 65 28 66 6c 64 20 | 22 6d 79 73 74 61 72 74 |ate(fld |"mystart|
|00002230| 4c 22 29 20 69 6e 74 6f | 20 4c 65 6e 67 74 68 0d |L") into| Length.|
|00002240| 69 66 20 4c 65 6e 67 74 | 68 20 69 73 20 65 6d 70 |if Lengt|h is emp|
|00002250| 74 79 20 74 68 65 6e 0d | 70 75 74 20 34 20 69 6e |ty then.|put 4 in|
|00002260| 74 6f 20 4c 65 6e 67 74 | 68 0d 70 75 74 20 34 20 |to Lengt|h.put 4 |
|00002270| 69 6e 74 6f 20 66 6c 64 | 20 22 6d 79 73 74 61 72 |into fld| "mystar|
|00002280| 74 4c 22 0d 65 6e 64 20 | 69 66 0d 0d 70 75 74 20 |tL".end |if..put |
|00002290| 76 61 6c 69 64 61 74 65 | 28 66 6c 64 20 22 6d 79 |validate|(fld "my|
|000022a0| 65 6e 64 4c 22 29 20 69 | 6e 74 6f 20 65 6e 64 4c |endL") i|nto endL|
|000022b0| 65 6e 67 74 68 0d 69 66 | 20 65 6e 64 4c 65 6e 67 |ength.if| endLeng|
|000022c0| 74 68 20 69 73 20 65 6d | 70 74 79 20 74 68 65 6e |th is em|pty then|
|000022d0| 0d 70 75 74 20 33 30 30 | 20 69 6e 74 6f 20 65 6e |.put 300| into en|
|000022e0| 64 4c 65 6e 67 74 68 0d | 70 75 74 20 33 30 30 20 |dLength.|put 300 |
|000022f0| 69 6e 74 6f 20 66 6c 64 | 20 22 6d 79 65 6e 64 4c |into fld| "myendL|
|00002300| 22 0d 65 6e 64 20 69 66 | 0d 0d 70 75 74 20 76 61 |".end if|..put va|
|00002310| 6c 69 64 61 74 65 28 66 | 6c 64 20 22 6d 79 69 6e |lidate(f|ld "myin|
|00002320| 63 72 65 6d 65 6e 74 22 | 29 20 69 6e 74 6f 20 69 |crement"|) into i|
|00002330| 6e 63 72 65 6d 65 6e 74 | 0d 69 66 20 69 6e 63 72 |ncrement|.if incr|
|00002340| 65 6d 65 6e 74 20 69 73 | 20 65 6d 70 74 79 20 74 |ement is| empty t|
|00002350| 68 65 6e 0d 70 75 74 20 | 34 20 69 6e 74 6f 20 69 |hen.put |4 into i|
|00002360| 6e 63 72 65 6d 65 6e 74 | 0d 70 75 74 20 34 20 69 |ncrement|.put 4 i|
|00002370| 6e 74 6f 20 66 6c 64 20 | 22 6d 79 69 6e 63 72 65 |nto fld |"myincre|
|00002380| 6d 65 6e 74 22 0d 65 6e | 64 20 69 66 0d 2d 2d 2d |ment".en|d if.---|
|00002390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000023a0| 2d 2d 2d 2d 2d 2d 2d 0d | 2d 2d 63 6f 6e 76 65 72 |-------.|--conver|
|000023b0| 74 20 61 6e 67 6c 65 20 | 74 6f 20 74 68 65 74 61 |t angle |to theta|
|000023c0| 20 3a 0d 70 75 74 20 28 | 70 69 2a 61 6e 67 6c 65 | :.put (|pi*angle|
|000023d0| 29 2f 31 38 30 20 69 6e | 74 6f 20 61 6e 67 6c 65 |)/180 in|to angle|
|000023e0| 0d 2d 2d 2d 63 65 6e 74 | 65 72 20 74 68 65 20 64 |.---cent|er the d|
|000023f0| 72 61 77 69 6e 67 3a 0d | 70 75 74 20 32 31 37 20 |rawing:.|put 217 |
|00002400| 69 6e 74 6f 20 58 0d 70 | 75 74 20 31 37 31 20 69 |into X.p|ut 171 i|
|00002410| 6e 74 6f 20 59 0d 70 75 | 74 20 61 6e 67 6c 65 20 |nto Y.pu|t angle |
|00002420| 69 6e 74 6f 20 74 68 65 | 74 61 0d 63 68 6f 6f 73 |into the|ta.choos|
|00002430| 65 20 6c 69 6e 65 20 74 | 6f 6f 6c 0d 69 66 20 75 |e line t|ool.if u|
|00002440| 73 65 53 70 65 63 69 61 | 6c 20 74 68 65 6e 0d 73 |seSpecia|l then.s|
|00002450| 70 65 63 69 61 6c 53 70 | 69 72 6f 20 58 2c 59 2c |pecialSp|iro X,Y,|
|00002460| 74 68 65 74 61 2c 20 4c | 65 6e 67 74 68 2c 69 6e |theta, L|ength,in|
|00002470| 63 72 65 6d 65 6e 74 2c | 65 6e 64 4c 65 6e 67 74 |crement,|endLengt|
|00002480| 68 2c 61 6e 67 6c 65 0d | 65 6c 73 65 0d 73 65 74 |h,angle.|else.set|
|00002490| 20 74 68 65 20 70 61 74 | 74 65 72 6e 20 74 6f 20 | the pat|tern to |
|000024a0| 31 0d 72 65 70 65 61 74 | 0d 73 65 74 20 63 75 72 |1.repeat|.set cur|
|000024b0| 73 6f 72 20 74 6f 20 62 | 75 73 79 0d 70 75 74 20 |sor to b|usy.put |
|000024c0| 58 20 2b 20 74 72 75 6e | 63 28 4c 65 6e 67 74 68 |X + trun|c(Length|
|000024d0| 20 2a 20 63 6f 73 28 74 | 68 65 74 61 29 29 20 69 | * cos(t|heta)) i|
|000024e0| 6e 74 6f 20 6e 65 77 58 | 0d 70 75 74 20 59 20 2b |nto newX|.put Y +|
|000024f0| 20 74 72 75 6e 63 28 4c | 65 6e 67 74 68 20 2a 20 | trunc(L|ength * |
|00002500| 73 69 6e 28 74 68 65 74 | 61 29 29 20 69 6e 74 6f |sin(thet|a)) into|
|00002510| 20 6e 65 77 59 0d 64 72 | 61 67 20 66 72 6f 6d 20 | newY.dr|ag from |
|00002520| 58 2c 59 20 74 6f 20 6e | 65 77 58 2c 6e 65 77 59 |X,Y to n|ewX,newY|
|00002530| 0d 70 75 74 20 6e 65 77 | 58 20 69 6e 74 6f 20 58 |.put new|X into X|
|00002540| 0d 70 75 74 20 6e 65 77 | 59 20 69 6e 74 6f 20 59 |.put new|Y into Y|
|00002550| 0d 70 75 74 20 74 68 65 | 74 61 20 2b 20 61 6e 67 |.put the|ta + ang|
|00002560| 6c 65 20 69 6e 74 6f 20 | 74 68 65 74 61 0d 61 64 |le into |theta.ad|
|00002570| 64 20 69 6e 63 72 65 6d | 65 6e 74 20 74 6f 20 4c |d increm|ent to L|
|00002580| 65 6e 67 74 68 0d 69 66 | 20 4c 65 6e 67 74 68 20 |ength.if| Length |
|00002590| 3e 20 65 6e 64 4c 65 6e | 67 74 68 20 74 68 65 6e |> endLen|gth then|
|000025a0| 20 65 78 69 74 20 72 65 | 70 65 61 74 0d 65 6e 64 | exit re|peat.end|
|000025b0| 20 72 65 70 65 61 74 0d | 65 6e 64 20 69 66 0d 63 | repeat.|end if.c|
|000025c0| 68 6f 6f 73 65 20 73 65 | 6c 65 63 74 20 74 6f 6f |hoose se|lect too|
|000025d0| 6c 0d 64 72 61 67 20 66 | 72 6f 6d 20 34 33 34 2c |l.drag f|rom 434,|
|000025e0| 31 20 74 6f 20 35 31 32 | 2c 33 34 32 0d 74 79 70 |1 to 512|,342.typ|
|000025f0| 65 20 6e 75 6d 74 6f 63 | 68 61 72 28 38 29 0d 63 |e numtoc|har(8).c|
|00002600| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|00002610| 6c 0d 65 6e 64 20 73 70 | 69 72 6f 0d 0d 6f 6e 20 |l.end sp|iro..on |
|00002620| 73 70 65 63 69 61 6c 53 | 70 69 72 6f 20 20 58 2c |specialS|piro X,|
|00002630| 59 2c 74 68 65 74 61 2c | 4c 65 6e 67 74 68 2c 69 |Y,theta,|Length,i|
|00002640| 6e 63 72 65 6d 65 6e 74 | 2c 65 6e 64 4c 65 6e 67 |ncrement|,endLeng|
|00002650| 74 68 2c 61 6e 67 6c 65 | 0d 73 65 74 20 74 68 65 |th,angle|.set the|
|00002660| 20 70 61 74 74 65 72 6e | 20 74 6f 20 31 0d 64 6f | pattern| to 1.do|
|00002670| 6d 65 6e 75 20 22 73 65 | 6c 65 63 74 20 61 6c 6c |menu "se|lect all|
|00002680| 22 0d 64 6f 6d 65 6e 75 | 20 22 69 6e 76 65 72 74 |".domenu| "invert|
|00002690| 22 0d 64 72 61 67 20 66 | 72 6f 6d 20 34 33 34 2c |".drag f|rom 434,|
|000026a0| 30 20 74 6f 20 35 31 32 | 2c 33 34 32 0d 74 79 70 |0 to 512|,342.typ|
|000026b0| 65 20 6e 75 6d 74 6f 63 | 68 61 72 28 38 29 0d 63 |e numtoc|har(8).c|
|000026c0| 68 6f 6f 73 65 20 6c 69 | 6e 65 20 74 6f 6f 6c 0d |hoose li|ne tool.|
|000026d0| 72 65 70 65 61 74 0d 73 | 65 74 20 63 75 72 73 6f |repeat.s|et curso|
|000026e0| 72 20 74 6f 20 62 75 73 | 79 0d 70 75 74 20 58 20 |r to bus|y.put X |
|000026f0| 2b 20 74 72 75 6e 63 28 | 4c 65 6e 67 74 68 20 2a |+ trunc(|Length *|
|00002700| 20 63 6f 73 28 74 68 65 | 74 61 29 29 20 69 6e 74 | cos(the|ta)) int|
|00002710| 6f 20 6e 65 77 58 0d 70 | 75 74 20 59 20 2b 20 74 |o newX.p|ut Y + t|
|00002720| 72 75 6e 63 28 4c 65 6e | 67 74 68 20 2a 20 73 69 |runc(Len|gth * si|
|00002730| 6e 28 74 68 65 74 61 29 | 29 20 69 6e 74 6f 20 6e |n(theta)|) into n|
|00002740| 65 77 59 0d 64 72 61 67 | 20 66 72 6f 6d 20 58 2c |ewY.drag| from X,|
|00002750| 59 20 74 6f 20 6e 65 77 | 58 2c 6e 65 77 59 20 77 |Y to new|X,newY w|
|00002760| 69 74 68 20 6f 70 74 69 | 6f 6e 6b 65 79 0d 70 75 |ith opti|onkey.pu|
|00002770| 74 20 6e 65 77 58 20 69 | 6e 74 6f 20 58 0d 70 75 |t newX i|nto X.pu|
|00002780| 74 20 6e 65 77 59 20 69 | 6e 74 6f 20 59 0d 70 75 |t newY i|nto Y.pu|
|00002790| 74 20 74 68 65 74 61 20 | 2b 20 61 6e 67 6c 65 20 |t theta |+ angle |
|000027a0| 69 6e 74 6f 20 74 68 65 | 74 61 0d 61 64 64 20 69 |into the|ta.add i|
|000027b0| 6e 63 72 65 6d 65 6e 74 | 20 74 6f 20 4c 65 6e 67 |ncrement| to Leng|
|000027c0| 74 68 0d 69 66 20 4c 65 | 6e 67 74 68 20 3e 20 65 |th.if Le|ngth > e|
|000027d0| 6e 64 4c 65 6e 67 74 68 | 20 74 68 65 6e 20 65 78 |ndLength| then ex|
|000027e0| 69 74 20 72 65 70 65 61 | 74 0d 65 6e 64 20 72 65 |it repea|t.end re|
|000027f0| 70 65 61 74 0d 65 6e 64 | 20 73 70 65 63 69 61 6c |peat.end| special|
|00002800| 53 70 69 72 6f 0d 0d 66 | 75 6e 63 74 69 6f 6e 20 |Spiro..f|unction |
|00002810| 76 61 6c 69 64 61 74 65 | 20 76 61 72 20 20 2d 2d |validate| var --|
|00002820| 2d 62 65 63 61 75 73 65 | 20 77 65 20 63 61 72 65 |-because| we care|
|00002830| 0d 70 75 74 20 76 61 72 | 20 69 6e 74 6f 20 74 65 |.put var| into te|
|00002840| 6d 70 0d 72 65 70 65 61 | 74 20 77 69 74 68 20 69 |mp.repea|t with i|
|00002850| 20 3d 20 31 20 74 6f 20 | 6c 65 6e 67 74 68 20 6f | = 1 to |length o|
|00002860| 66 20 74 65 6d 70 0d 69 | 66 20 63 68 61 72 20 69 |f temp.i|f char i|
|00002870| 20 6f 66 20 74 65 6d 70 | 20 69 73 20 6e 6f 74 20 | of temp| is not |
|00002880| 69 6e 20 22 2e 30 31 32 | 33 34 35 36 37 38 39 22 |in ".012|3456789"|
|00002890| 20 74 68 65 6e 0d 61 6e | 73 77 65 72 20 22 42 61 | then.an|swer "Ba|
|000028a0| 64 20 44 61 74 61 3a 20 | 22 26 76 61 72 26 26 22 |d Data: |"&var&&"|
|000028b0| 20 4e 6f 77 20 75 73 69 | 6e 67 20 64 65 66 61 75 | Now usi|ng defau|
|000028c0| 6c 74 73 2e 22 0d 72 65 | 74 75 72 6e 20 65 6d 70 |lts.".re|turn emp|
|000028d0| 74 79 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 72 65 |ty.end i|f.end re|
|000028e0| 70 65 61 74 0d 72 65 74 | 75 72 6e 20 74 65 6d 70 |peat.ret|urn temp|
|000028f0| 0d 65 6e 64 20 76 61 6c | 69 64 61 74 65 0d 0d 00 |.end val|idate...|
|00002900| 00 00 00 60 42 4d 41 50 | 00 00 08 9f 00 00 00 00 |...`BMAP|........|
|00002910| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |........|.V......|
|00002920| 01 56 02 00 00 00 01 b2 | 01 56 02 00 00 00 00 00 |.V......|.V......|
|00002930| 00 00 00 00 00 00 00 00 | 00 00 00 24 8c 12 20 09 |........|...$.. .|
|00002940| 8e 12 38 09 8d 12 10 18 | 01 bf 86 bf 86 bf 86 bf |..8.....|........|
|00002950| 86 bf 86 bf 86 bf 86 bf | 86 bf 86 bf 86 bd 86 00 |........|........|
|00002960| 00 00 01 00 43 41 52 44 | 00 00 0b 2a 00 00 00 00 |....CARD|...*....|
|00002970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 0d 27 |........|.......'|
|00002980| 00 00 0a d9 00 02 00 0b | 00 00 00 b2 00 05 00 00 |........|........|
|00002990| 00 17 00 58 00 0a 01 00 | 00 04 01 dd 00 1b 01 ff |...X....|........|
|000029a0| 20 00 00 00 54 c4 00 01 | 00 00 00 0c 00 00 00 10 | ...T...|........|
|000029b0| 4e 65 77 20 42 75 74 74 | 6f 6e 00 00 6f 6e 20 6d |New Butt|on..on m|
|000029c0| 6f 75 73 65 55 70 0d 73 | 68 6f 77 20 6d 65 6e 75 |ouseUp.s|how menu|
|000029d0| 62 61 72 0d 67 6f 20 68 | 6f 6d 65 0d 65 6e 64 20 |bar.go h|ome.end |
|000029e0| 6d 6f 75 73 65 55 70 0d | 00 00 00 5a 00 0b 01 00 |mouseUp.|...Z....|
|000029f0| 00 04 01 b7 00 1b 01 d9 | 20 00 00 00 68 0b 00 01 |........| ...h...|
|00002a00| 00 00 00 0c 00 00 00 10 | 4e 65 77 20 42 75 74 74 |........|New Butt|
|00002a10| 6f 6e 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 4d |on..on m|ouseUp.M|
|00002a20| 79 44 69 61 6c 6f 67 20 | 31 2c 36 36 36 36 2c 22 |yDialog |1,6666,"|
|00002a30| 22 2c 54 52 55 45 0d 65 | 6e 64 20 6d 6f 75 73 65 |",TRUE.e|nd mouse|
|00002a40| 55 70 0d 00 00 02 39 31 | 00 00 0a 37 00 00 0b 34 |Up....91|...7...4|
|00002a50| 35 30 00 00 08 32 00 00 | 09 31 00 00 00 00 00 00 |50...2..|.1......|
|00002a60| 00 00 00 20 54 41 49 4c | ff ff ff ff 13 54 68 61 |... TAIL|.....Tha|
|00002a70| 74 27 73 20 61 6c 6c 20 | 66 6f 6c 6b 73 2e 2e 2e |t's all |folks...|
+--------+-------------------------+-------------------------+--------+--------+